From: Michael Albinus Date: Fri, 6 Aug 2010 13:53:59 +0000 (+0200) Subject: * comint.el (comint-mode): Make directory tracking functions X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1~1^2~324^2~7048 X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=9babe30fa25c0ba9a0f6ef69cd15ad4ac6aaad2f;p=emacs.git * comint.el (comint-mode): Make directory tracking functions functional on remote files. (Bug#6764) --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 642409cda3d..a2943ee87fe 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2010-08-06 Jürgen Hötzel + + * comint.el (comint-mode): Make directory tracking functions + functional on remote files. (Bug#6764) + 2010-08-06 Dan Nicolaescu * vc/diff-mode.el (diff-mode-shared-map): Bind g to revert-buffer. diff --git a/lisp/comint.el b/lisp/comint.el index 071537ffd89..128965fc11f 100644 --- a/lisp/comint.el +++ b/lisp/comint.el @@ -674,6 +674,9 @@ Entry to this mode runs the hooks on `comint-mode-hook'." (make-local-variable 'comint-process-echoes) (make-local-variable 'comint-file-name-chars) (make-local-variable 'comint-file-name-quote-list) + ;; dir tracking on remote files + (set (make-local-variable 'comint-file-name-prefix) + (or (file-remote-p default-directory) "")) (make-local-variable 'comint-accum-marker) (setq comint-accum-marker (make-marker)) (make-local-variable 'font-lock-defaults)